Chris Herssens writes in his e-mail message of 21-May-92:
I'm a frequent user of GAP V3, but I have found a bug, namely that
the function 'NormedVector' is not in your library.
You are right. Well, take this one.
NormedVector := function ( vec )
local zero, elm;
zero := vec[1] - vec[1];
for elm in vec do
if elm <> zero then
return (1/elm) * vec;
fi;
od;
return vec;
end;
I will include this patch in the second upgrade, which will be posted to
the GAP Forum tomorrow. I have also forwarded your mail to the GAP
Forum.
Martin.
--
Martin Sch"onert, Martin.Schoenert@Math.RWTH-Aachen.DE, +49 241 804551
Lehrstuhl D f"ur Mathematik, Templergraben 64, RWTH, D 51 Aachen, Germany